home *** CD-ROM | disk | FTP | other *** search
/ Virtual Top Model / Virtual Top Model - Disc 1.iso / modulos / mod-3.dxr / 00006_boton panic.ls < prev    next >
Encoding:
Text File  |  1997-04-01  |  597 b   |  25 lines
  1. on mouseUp
  2.   if rollOver(13) then
  3.     set the member of sprite 13 to member "Fd_Bt_A/4" of castLib "elementos graficos"
  4.     puppetSprite(13, 0)
  5.     updateStage()
  6.     cursor(200)
  7.     set the soundLevel to 0
  8.     objMovie(mdispose)
  9.     closeXLib()
  10.     go("panic")
  11.   end if
  12. end
  13.  
  14. on mouseDown
  15.   repeat while the stillDown
  16.     puppetSprite(13, 1)
  17.     if rollOver(13) then
  18.       set the member of sprite 13 to member "Fd_Bt_B/4" of castLib "elementos graficos"
  19.     else
  20.       set the member of sprite 13 to member "Fd_Bt_A/4" of castLib "elementos graficos"
  21.     end if
  22.     updateStage()
  23.   end repeat
  24. end
  25.